home *** CD-ROM | disk | FTP | other *** search
/ Magic Disk 64 / Magic_Disk_64_90-04_1990_-_de_Side_A.d64 / [u] anwendung (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  2KB  |  67 lines
  1. 0 rem  zeichensaetze und bilder ein-
  2. 1 rem  bauen in eigene programme.
  3. 2 rem
  4. 3 rem  n1$ = name des zeichensatzes
  5. 4 rem  n2$ = name des bildes
  6. 5 rem
  7. 6 n1$="demo5 (zeichen)"
  8. 7 n2$="demo5 (screen)"                    :
  9. 8 ifx=0thenx=1:load"(3)",8,1:rem trans
  10. 9 ifx=1thenx=2:loadn2$,8,1:  rem screen   :
  11. 10 poke53280,0:poke53281,0:print"space to end
  12. 11 [151]53270,216:[151]53283,9:[151]53282,5
  13. 12 [129]a[178]828[164]828[170]45:[135]b:[151]a,b:[130]
  14. 15 [158]828:vc[178]53248:[151]vc[170]24,56
  15. 17 ci[178]56576:[151]ci,[194](ci)[175]252:[151]648,204:[153]"contload"
  16. 20 [131]234,165,1,120,41,251,133,1,160,0,132,251,132,253,169,208,133,252,169,224
  17. 22 [131]133,254,162,16,177,251,145,253,200,208,249,230,252,230,254,202,208,242
  18. 25 [131]165,1,9,4,133,1,88,96
  19. 27 [158]57812n1$,8:[151]780,0
  20. 30 [151]781,0:[151]782,224:[158]65493
  21. 32 [158]24000,35000,35999,55296,55
  22. 35 [158]24000,34000,34999,52224,55:[129]t[178]1[164]200:[130]
  23. 37 [161]a$
  24. 38 [153]"contload":[158]24000,1024,2023,52224,55:[129]t[178]1[164]200:[130]:[153]"load"
  25. 39 [139]a$[179][177]" "[167]32
  26. 40 [153]"load":[128]
  27. 41 :
  28. 42 [143]  die bilder werden absolut
  29. 43 [143]  geladen (,8,1) und dann mit
  30. 44 [143]  dem transferebefehl verschoben.
  31. 45 [143]  der screen (34000-34999) wird
  32. 46 [143]  nach 52224 geschoben, die
  33. 47 [143]  farbinfo's (35000-35999) werden
  34. 48 [143]  nach 55296 gebracht
  35. 49 [143]  (zeile 32+35).
  36. 50 [143]  durch den neuen zeichensatz
  37. 51 [143]  aendert sich einiges im
  38. 52 [143]  speicher.
  39. 53 [143]  der neue bildschirmspeicher
  40. 54 [143]  liegt nicht mehr bei 1024,
  41. 55 [143]  sonder ab 52224.
  42. 56 [143]  der farbspeicher bleibt er-
  43. 57 [143]  halten.
  44. 58 [143]  sprites muessen ab 49152 im
  45. 59 [143]  speicher stehen, die sprite-
  46. 60 [143]  pointer liegen von 53240 bis
  47. 61 [143]  53247.
  48. 62 [143]  sie errechnen sich aus:
  49. 63 [143]  (lageort-49152)/64
  50. 64 [143]  bei 'runstop/restore' ist der
  51. 65 [143]  cursor verschwunden. sie
  52. 66 [143]  muessen nun 'blind' eingeben:
  53. 67 [143]  poke648,4.
  54. 68 [143]  der zeichensatz liegt bei
  55. 69 [143]  57344 unter dem kernal-rom.
  56. 70 [143]  multicolor einschalten durch:
  57. 71 [143]  poke53270,216
  58. 72 [143]  wieder ausschalten:
  59. 73 [143]  poke53270,200
  60. 74 [143]  farbe 2 aendern:poke53283,x
  61. 76 [143]  farbe 3 aendern:poke53282,x
  62. 77 [143]  farbe 1 = schriftfarbe, bei
  63. 78 [143]  multicolor nur farben 8-15
  64. 79 [143]  benutzen.
  65. 80 [143]
  66. 81 [143]  saurien software cp (c) 1989
  67.